home *** CD-ROM | disk | FTP | other *** search
/ Xenosoft 2 / Xenosoft 2 (Game collection)(1994).iso / bioforge / script / escher.scp < prev    next >
Text File  |  1994-12-01  |  5KB  |  277 lines
  1. { DGS4ESC
  2.  
  3.     W    2
  4.     I  ^âû               THEN é     
  5.  
  6.     I  ^âæ          THEN é     
  7.  
  8.     I  ^îÜ            THEN é     
  9.  
  10.     ^âÜ                = $Ç╝  
  11.  
  12.     I  ^âô             = $Ç╗    THEN
  13.     {
  14.         ^âû               = $Ç╝  
  15.         A  OFF
  16.  
  17.         @Ç¢              ( ESCHEAD )
  18.         M      AWAKE3 CONTINUE
  19.  
  20.         @Ç¢              ( PLAYER )
  21.  
  22.         I  @ÇÄ             ( DGS4 )= 0 THEN
  23.         {
  24.             C      DGS4
  25.         }
  26.     
  27.         G  SET1 WALK
  28.         £    ESHFACE GRADUAL
  29.         M      ESCHER1 FREEZE
  30.  
  31.         W    1 SECOND
  32.  
  33.         @Ç¢              ( ESCHEAD )
  34.  
  35.         I  ^âù             > 0 THEN
  36.         {
  37.             I  @Çó            ( ^âù             ) = 0 THEN
  38.             {
  39.                 ^âù             = @Çì      ESCHER_TALK
  40.             }
  41.             E   
  42.             {
  43.                 ^âÿ                  = $Ç╗   
  44.             }
  45.         }
  46.         E   
  47.         {
  48.             ^âù             = @Çì      ESCHER_TALK
  49.         }
  50.  
  51.         // @@@ PLEASE TRANSLATE
  52.                     @Ç║      (`⥠               "DR. ESCHER: Don't kill me...")
  53.         W    1 SECOND
  54.                     @Ç║      (`â₧                "Mastaba shot me, the traitor bastard.")
  55.                     @Ç║      (`⃠                "He's already beaten you to it.") 
  56.         W    1 SECOND
  57.                     @Ç║      (`躠                "And he's sealed me in.")
  58.         W    1 SECOND
  59.                     @Ç║      (`âá                "This place is now my tomb, too.")
  60.         W    2 SECONDS
  61.                     @Ç║      (`âí                "What are you doing here?")
  62.                     @Ç║      (`âó                "Are you still human..."
  63.                     @Ç║      (`âú                " ...or are you a machine?")
  64.         W    1 SECOND
  65.                     @Ç║      (`âñ                "Are you THEIR machine...?")
  66.     
  67.         ^âô             = $Ç╝  
  68.         I  @Çó            ( ^âù             ) THEN
  69.             ^âÿ                  = $Ç╝  
  70.     
  71.         @Ç¢              ( PLAYER )
  72. //        FACE ESCHER GRADUAL CONTINUE
  73.         M      ESCHER3
  74.     
  75.         A  ON
  76.         C      UNLOCK
  77.         ^âû               = $Ç╗   
  78.  
  79.         W    8 SECONDS
  80.         i           LEX METESH
  81.  
  82.         W    20 SECONDS
  83.         I  ^âÆ            = $Ç╗    THEN
  84.             {
  85.             I  @ÇÜ            ( MEDICAID ) THEN
  86.                 i           LEX NOEMED
  87.             E   
  88.                 i           LEX MEDOUT
  89.             }
  90.  
  91.  
  92.     }
  93.     E   
  94.     {
  95.  
  96.         I  ^îù           = $Ç╗    THEN
  97.         {
  98.             I  ^âö             THEN
  99.             {
  100.                 W    1 SECOND
  101.                 ^âû               = $Ç╝  
  102.  
  103.                 I  ^âù             > 0 THEN
  104.                 {
  105.                     I  @Çó            ( ^âù             ) = 0 THEN
  106.                     {
  107.                         ^âù             = @Çì      ESCHER_TALK
  108.                     }
  109.                     E   
  110.                     {
  111.                         ^âÿ                  = $Ç╗   
  112.                     }
  113.  
  114.                 }
  115.  
  116.                 @Ç¢              ( ESCHEAD )
  117.                             @Ç║      (`à║                "DR. ESCHER: Let me rest.")
  118.                 I  @Çó            ( ^âù             ) THEN
  119.                     ^âÿ                  = $Ç╝  
  120.                 ^âû               = $Ç╗   
  121.  
  122.             }
  123.  
  124.             E   
  125.             {
  126.  
  127.                 ^âû               = $Ç╝  
  128.                 A  OFF
  129.     
  130.                 I  @ÇÄ             ( DGS4 )= 0 THEN
  131.                 {
  132.                     C      DGS4
  133.                 }
  134.     
  135.                 G  SET1 WALK
  136.                 £    ESHFACE GRADUAL
  137.                 M      ESCHER1 FREEZE
  138.  
  139.                 W    1 SECOND
  140.  
  141.                 I  @ÇÄ             ( DGS4 )= 0 THEN
  142.                 {
  143.                     C      DGS4
  144.                 }
  145.                 I  ^âù             > 0 THEN
  146.                 {
  147.                     I  @Çó            ( ^âù             ) = 0 THEN
  148.                     {
  149.                         ^âù             = @Çì      ESCHER_TALK
  150.                     }
  151.                     E   
  152.                     {
  153.                         ^âÿ                  = $Ç╗   
  154.                     }
  155.                 }
  156.  
  157.                             @Ç║      (`äö                "DR. ESCHER: It's too late to save me.")
  158.                             @Ç║      (`ä╕                "Don't let Mastaba destroy~all that's left of this race.")
  159.                             @Ç║      (`à╣                "If you are who I think you are,~you won't fail.")
  160.                 W    3 SECONDS
  161.                             @Ç║      (`à║                "Let me rest.")
  162.  
  163.                 I  @Çó            ( ^âù             ) THEN
  164.                     ^âÿ                  = $Ç╝  
  165.  
  166. //                FACE ESCHER GRADUAL CONTINUE
  167.                 M      ESCHER3
  168.     
  169.                 A  ON
  170.                 C      UNLOCK
  171.                 ^âö             = $Ç╝  
  172.                 ^âû               = $Ç╗   
  173.             }
  174.         }
  175.     }
  176.     ^âÜ                = $Ç╗   
  177.  
  178. }
  179.  
  180. { ESCHER_TALK
  181.  
  182. // MAKES HER RANDOMLY BOB HER HEAD. 
  183.  
  184. // KILLING THE PROCESS LEAVES THE HEAD IN BAD STATES, HENCE THE _STOP FLAG
  185.  
  186.     P        ~ÇÇ   
  187.  
  188.     ^âÿ                  = $Ç╗   
  189.  
  190.     // MUST COME BEFORE LINK. - BAR
  191.  
  192.     ó               DGS1 DGS4
  193.  
  194.     @Ç¢              ( ESCHEAD )
  195.  
  196.     :LOOP
  197.  
  198.     M      TALK CONTINUE
  199.     ~ÇÇ    = @Çà     20 100
  200.     W    ~ÇÇ   
  201.  
  202.     M      AWAKE3 FREEZE
  203.  
  204.     ~ÇÇ    = @Çà     10 30
  205.     W    ~ÇÇ   
  206.  
  207.     I  ^âÿ                  = $Ç╗    THEN
  208.         J    #Çé 
  209.  
  210. }
  211.  
  212. { ESCHEAD_STAND
  213.     o         
  214. }
  215.  
  216.  
  217. { ESCHER_WHINE
  218.  
  219.     P        ~ÇÇ         
  220.  
  221.     ó               DGS1 DGS2 DGS3 DGS4
  222.     :LOOP
  223.  
  224.     ~ÇÇ          = @Çà     300 1200
  225.     W    ~ÇÇ         
  226.     I  ^âæ          THEN é     
  227.     I  ^âÆ            THEN é     
  228.  
  229.     I  ^âÜ                THEN J    #Çà 
  230.  
  231.  
  232.     @Ç¥   PAUSE_FOR_SUBTITLE        // DON'T INTERRUPT MONSTER - LRG
  233.  
  234.     :WAIT_FOR_LEX                           // DON'T INTERRUPT LEX - LRG
  235.     â      
  236.     I ( @Çó            ( ^怒          ) ) THEN
  237.         J    #Çå         
  238.  
  239.  
  240.     I  ^âù             > 0 THEN
  241.         {
  242.         I  @Çó            ( ^âù             ) THEN
  243.             {
  244.                 J    #Çà 
  245.             }
  246.         }
  247.  
  248.     ^âù             = @Çì      ESCHER_TALK
  249.  
  250.     I  ^îÜ            THEN
  251.         {
  252.         I  @Çù            (`è▒           ) OR @Çù            (`è▓           ) THEN é     
  253.         I  @Çà    ( 1 4 ) < 3 THEN
  254.             {
  255.             @Çå   (`è▒           , ESCHEAD)
  256.             }
  257.         E   
  258.             {
  259.             @Çå   (`è▓           , ESCHEAD)
  260.             }
  261.         }
  262.     E   
  263.         {
  264.                     @Ç║      (`âÑ                "I need a doctor...")
  265.         }
  266.  
  267.     I  @Çó            ( ^âù             ) THEN
  268.     {
  269.         ^âÿ                  = $Ç╝  
  270.     }
  271.  
  272.     J    #Çà 
  273. }
  274.  
  275.  
  276. //$ 26 - version number
  277.